home *** CD-ROM | disk | FTP | other *** search
Wrap
;$VER: akSVG_Installer 43.100 (16.10.1997) #DOS © Msi Software FAILAT 21 ;Check OS version! c/akT OS 39 IF WARN ECHO "You need OS 3.0 or later!" ASK "Press return!" QUIT ENDIF ;Display old and new dt version etc! c/akT >ENV:akver VER classes/Datatypes/akSVG.datatype c/akT >ENV:akverold VER Sys:Classes/Datatypes/akSVG.datatype IF NOT WARN C:RequestChoice >NIL: "Andreas Ralph Kleinert presents:" "$akver" "Install/Update" ELSE C:RequestChoice >NIL: "Andreas Ralph Kleinert presents:" "$akver*N(old: $akverold)" "Install/Update" ENDIF UNSETENV akver UNSETENV akverold ;Create dt prefs drawer if not found! IF NOT EXISTS SYS:Prefs/DataTypes C:Makedir >NIL: SYS:Prefs/DataTypes C:Copy >NIL: prefs/datatypes.info SYS:Prefs/DataTypes.info CLONE ENDIF ;Move any dtprefs to sys:prefs/datatypes! IF EXISTS sys:prefs/akSVGprefs C:Rename >NIL: sys:prefs/akSVGprefs#? sys:prefs/datatypes ENDIF ;Create ENV:Datatypes if not found! IF NOT EXISTS ENV:Datatypes C:Makedir >NIL: ENV:Datatypes ENVARC:Datatypes ENDIF ;Install dtprefs if not found or current one is old! c/akT CHK prefs/datatypes/akSVGPrefs SYS:prefs/datatypes/akSVGPrefs IF WARN C:Copy >NIL: prefs/datatypes/akSVGPrefs SYS:prefs/datatypes CLONE IF NOT EXISTS sys:prefs/datatypes/akSVGPrefs.info C:Copy >NIL: prefs/datatypes/akSVGPrefs.info SYS:prefs/datatypes CLONE ENDIF ENDIF ;Install gui if not found or current one is old! c/akT CHK prefs/datatypes/akSVGPrefs_gui.wizard SYS:prefs/datatypes/akSVGPrefs_gui.wizard IF WARN C:Copy >NIL: prefs/datatypes/akSVGPrefs_gui.wizard SYS:prefs/datatypes CLONE ENDIF ;Install correct dt! c/akT CHK classes/datatypes/akSVG.datatype SYS:classes/datatypes/akSVG.datatype IF WARN c/akT CPU 060 IF NOT WARN C:Copy >NIL: classes/datatypes/akSVG.datatype.060 SYS:Classes/datatypes/akSVG.datatype CLONE ELSE c/akT CPU 040 IF NOT WARN C:Copy >NIL: classes/datatypes/akSVG.datatype.040 SYS:Classes/datatypes/akSVG.datatype CLONE ELSE c/akT CPU 030 IF NOT WARN C:Copy >NIL: classes/datatypes/akSVG.datatype.030 SYS:Classes/datatypes/akSVG.datatype CLONE ELSE c/akT CPU 020 IF NOT WARN C:Copy >NIL: classes/datatypes/akSVG.datatype.030 SYS:Classes/datatypes/akSVG.datatype CLONE ELSE C:Copy >NIL: classes/datatypes/akSVG.datatype SYS:Classes/datatypes/akSVG.datatype CLONE ENDIF ENDIF ENDIF ENDIF ;Move any old dt headers to storage! Rename >NIL: SYS:Devs/Datatypes/#?SVG SYS:Storage/Datatypes/ ;Install new dt header! C:Copy >NIL: devs/datatypes/SVG DEVS:DataTypes IF NOT EXISTS DEVS:DataTypes/SVG.info C:Copy >NIL: devs/datatypes/SVG.info DEVS:DataTypes ENDIF ;Change dir to docs! CD Docs ;Show guide and start dtprefs! Run >NIL: MultiView akSVG.guide Run >NIL: /Prefs/DataTypes/akSVGPrefs ;Install completed message! C:RequestChoice >NIL: "ak Installer" "Install completed!*NPlease reboot the system,*Nto use the new datatype!*N*NIf this is the first time you install,*Nyou do not need to reboot!" "Ok" C:AddDataTypes >NIL: REFRESH ELSE ;Install not needed message! C:RequestChoice >NIL: "ak Installer" "Install not needed!*NYou have the same or a higher version!" "Ok" ENDIF ;Clean up memory/free resources! C:Avail >NIL: FLUSH